
Imports cmplib01


Public Class frmAdvantageEditor

    Private ptrBG As BattlegroupChit

    Public Shadows Sub showdialog(ByRef bg As BattlegroupChit)
        ptrBG = bg
        CtlAdvantageEditor1.ListAdvantages(ptrBG)
        MyBase.ShowDialog()

    End Sub



    Private Sub frmAdvantageEditor_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class